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Paper Tape and Mag Tape Input Routines 

The standard Input routine for binary tapes is that shown 
on the next page* The block format is: 



sto fa 


j first address 


-sto-la 


[last address 


wd i 




fdata words 


wd n 




cics 


|- sum of all other words in 




(block. 



There are two types of start blocks to denote the end 
of the tape* Icsaediate start blocks consist of trn starting 
address, and transfer at once to the address specified. 
Delayed start blocks consist of add starting address, and will 
stop on a halt in the input routine, transferring to the 
starting address when restart is pressed „ 

The new input routine contains one halt instruction which 
is reached for both delayed start blocks and checksum errors « 
Delayed start b looks will display add starting address in the 
LR, whilo checksum errors will display sto last address in the 
LR, Pushing RlgTART will transfer to the starting address if 
stopped on a start block, and will restart the Input routine 
in case of a checksum stop* In the latter case care should be 
taken that the tape Is positioned In the reader at the beginning 
of a block* 



-2- 
standard Input routine 
readin 

177561 



b> r3c 

sto a 
trn a 

cyl+lro+xro-opr-opr 
trn d 

r3c+lad~opr 
alr+xr©-»opr 
c 5 r3c 

lad 

air 

ado a 

tix c 

r3c+iad~opr 

fcze b 

d, hit 

trx 



xx^hlt 
start add b 



-3- 

This Is designed to read binary mag tapes written by 
Mag Tape Midas during an assembly * The coding is shown on 
the next page* 

To use this routine, the mag tape must be positioned 
at the beginning of the program on tape. (Usually this involves 
rewinding the tape after an assembly « ) Place the Mag Tape 
Input Routine in the PETR and hit READ-IN, The routine will 
be read into core, and immediately start reading the mag tape* 
When it reaches the start block, it will transfer control at 
once to the address specified in the case of immediate start 
blocks, or it will halt with add starting address in the LR, 
and twice this in the AC in the case of delayed start blocks. 
Pushing RESTART will transfer to the starting address. 

Checksum errors halt with -0 in the AC. When RESTART 
is pushed, the TAG is checked. If positive, the tape is 
backspaced and another attempt is made at reading the record 
in error. If negative, the record in error is left in core 
as read, and the routine continues reading the next block. 



_4- 



mag tape input routine 



readin 

17742 f 
beg, 



next, 



loop* 

data.. 



halt, 

Ive^ 



cite* 



tac 

tm ,+2 

bsr-fl 

rtb+l 

cpyUlacUlxr 

trn Ive 

cyl 

trn halt 

sir data 

cpyUlac 

add data 

axr 

sto cks 

cpyUlac 

sto 

add cks 

sto cks 

ado data 

tix loop 

cpyUlac 

add cks 

tze next 

clc 

hit 

tra beg 

hit 

cyl 

trn next 

trx 





start add next 



